home *** CD-ROM | disk | FTP | other *** search
/ Graphics Plus / Graphics Plus.iso / general / fractal / kaos.lha / auxlib / aux_quit_proc.c < prev    next >
Encoding:
C/C++ Source or Header  |  1989-11-18  |  759 b   |  34 lines
  1. /*
  2. ### procedure for quitting combined space windows ###
  3. */
  4.  
  5. #include <suntool/sunview.h>
  6. #include <suntool/canvas.h>
  7. #include <suntool/panel.h>
  8.  
  9. void
  10. aux_quit_proc(item)
  11. Panel_item item;
  12. {
  13.         int i,aux_i;
  14.         extern int aux_max;
  15.         extern int *aux_on;
  16.         extern Frame *aux_frame;
  17.         extern Panel *aux_panel;
  18.         extern Canvas *aux_canvas;
  19.         extern Panel_item *aux_quit_item;
  20.  
  21.         for(i=0;i<=aux_max;i++){
  22.                 if(item == aux_quit_item[i])
  23.                         aux_i = i;
  24.         }
  25.         if(aux_on[aux_i]){
  26.                 window_destroy(aux_canvas[aux_i]);
  27.                 window_destroy(aux_panel[aux_i]);
  28.                 window_destroy(aux_frame[aux_i]);
  29.                 aux_on[aux_i]=0;
  30.         }
  31. }
  32.  
  33.  
  34.